.md # Ταξική Συνείδηση
:::info
Συγγραφή: *Κώστας Κούδας*
Υλοποίηση μέσω γλώσσας Wolfram στο [WLJS Notebook](https://jerryi.github.io/wljs-docs/).
:::
:::warning
⚠️ ΥΠΟ ΚΑΤΑΣΚΕΥΗ ⚠️
:::
Στην παρούσα ενότητα θα μοντελοποιήσουμε μια απλοποιημένη εκδοχή του κλασικού μαρξιστικού μοντέλου σχετικά με την πάλη των τάξεων. Θα εμπλακούν τρεις παράμετροι:
- το μέσο επίπεδο ταξικής συνείδησης του πληθυσμού (`MTS`) σε σχέση με την πλήρη ταξική συνείδηση,
- το ποσοστό επί του πληθυσμού του κομμουνιστικού κόμματος (`KK`),
- το ποσοστό της δεξιάς (`DE`) και
- το μέγεθος των ανισοτήτων (`GINI`).
Όλα τα παραπάνω είναι ποσοστά και μπορούμε να δεχτούμε τα κάτωθι:
- Όσον αφορά το μέσο επιπεπίπεδο ταξικής συνείδησης του πληθυσμού:
- ο ρυθμός αύξησής του είναι ανάλογος του περιθωρίου που έχει αυτό για αύξηση,
- το μέγεθος του κομμουνιστικού κόμματος συμβάλει στο να είναι θετικός ο ρυθμός αύξησής του,
- το μέγεθος της δεξιάς συμβάλει στο να είναι αρνητικός,
- ο ρυθμός μεταβολής του (θετικός ή αρνητικός) εντείνεται από τις ανισότητες.
- Όσον αφορά το ποσοστό του κομμουνιστικού κόμματος ο ρυθμός αύξησής του είναι ανάλογος:
- του περιθωρίου που έχει αυτό για αύξηση,
- του ήδη υπάρχοντος μεγέθους του,
- του επιπέδου ταξικής συνείδησης,
- της έντασης των ανισοτήτων,
- Όσον αφορά το ποσοστό της δεξιάς ο ρυθμός αύξησής του:
- είναι ανάλογος του περιθωρίου που έχει αυτό για αύξηση,
- είναι ανάλογος του ήδη υπάρχοντος μεγέθους του,
- γίνεται αρνητικός, όταν γίνει πολύ μεγάλη η ταξική συνείδηση,
- είναι ανάλογος της έντασης των ανισοτήτων.
- Όσον αφορά το μέγεθος των ανισοτήτων:
- ο ρυθμός αύξησής του είναι ανάλογος του περιθωρίου που έχει αυτό για αύξηση,
- το μέγεθος του κομμουνιστικού κόμματος συμβάλει στο να είναι αρνητικός ο ρυθμός αύξησής του,
- το μέγεθος της δεξιάς συμβάλει στο να είναι θετικός ο ρυθμός αύξησής του,
Ταξική Συνείδηση
Clear["Global`*"]
eqMTS := MTS'[t] == a1 (100-MTS[t])(a2 KK[t]-a3 DE[t])GINI[t]
eqK := KK'[t] == b1 (100-DE[t]-KK[t])KK[t]MTS[t]GINI[t]
eqD := KK'[t] == c1 (100-DE[t]-KK[t])DE[t]GINI[t]-c2 MTS[t]
eqGINI := GINI'[t] == d1 (100-GINI[t])(-d2 KK[t]+d3 DE[t])
eqS := S'[t] == a (100-S[t])KK[t]GINI[t]
eqK := KK'[t] == b (100-KK[t])KK[t]S[t]GINI[t]
eqGINI := GINI'[t] == c (100-GINI[t])/(S[t]KK[t])
vS := a (100-s)k g
vK := b (100-k)k S g
vG := c (100-g)/(s k)